home *** CD-ROM | disk | FTP | other *** search
/ The Netherlands - A Compact World / The Netherlands.iso / NederlandM2.dxr / Internal_8_moreinfo button.ls < prev    next >
Encoding:
Text File  |  2002-12-20  |  1.9 KB  |  56 lines
  1. on mouseUp me
  2.   global naam, taalkeuze
  3.   naamstring = chars(naam, 1, 1)
  4.   if (naamstring = "1") or (naamstring = "2") or (naamstring = "4") or (naamstring = "5") or (naamstring = "6") or (naamstring = "7") or (naamstring = "8") then
  5.     moreinfostring = "moreinfo:" & taalkeuze & ":" & naamstring & "-frame.html"
  6.     moreinfo(moreinfostring)
  7.   else
  8.     nothing()
  9.   end if
  10. end
  11.  
  12. on mouseEnter me
  13.   global naam
  14.   naamstring = chars(naam, 1, 1)
  15.   if (naamstring = "1") or (naamstring = "2") or (naamstring = "4") or (naamstring = "5") or (naamstring = "6") or (naamstring = "7") or (naamstring = "8") then
  16.     sis()
  17.     cursor(280)
  18.     tegelnaam = member(sprite(21).member).name
  19.     kalenaam = chars(tegelnaam, 1, tegelnaam.length - 5)
  20.     sprite(21).member = member(kalenaam & "_over")
  21.   end if
  22. end
  23.  
  24. on mouseLeave me
  25.   global naam
  26.   naamstring = chars(naam, 1, 1)
  27.   if (naamstring = "1") or (naamstring = "2") or (naamstring = "4") or (naamstring = "5") or (naamstring = "6") or (naamstring = "7") or (naamstring = "8") then
  28.     cursor(-1)
  29.     tegelnaam = member(sprite(21).member).name
  30.     kalenaam = chars(tegelnaam, 1, tegelnaam.length - 5)
  31.     sprite(21).member = member(kalenaam & "_norm")
  32.   end if
  33. end
  34.  
  35. on mouseDown me
  36.   global naam
  37.   naamstring = chars(naam, 1, 1)
  38.   if (naamstring = "1") or (naamstring = "2") or (naamstring = "4") or (naamstring = "5") or (naamstring = "6") or (naamstring = "7") or (naamstring = "8") then
  39.     tegelklik()
  40.     cursor(-1)
  41.     tegelnaam = member(sprite(21).member).name
  42.     kalenaam = chars(tegelnaam, 1, tegelnaam.length - 5)
  43.     sprite(21).member = member(kalenaam & "_down")
  44.   end if
  45. end
  46.  
  47. on enterFrame
  48.   global naam
  49.   naamstring = chars(naam, 1, 1)
  50.   if (naamstring = "1") or (naamstring = "2") or (naamstring = "4") or (naamstring = "5") or (naamstring = "6") or (naamstring = "7") or (naamstring = "8") then
  51.     sprite(21).blend = 100
  52.   else
  53.     sprite(21).blend = 25
  54.   end if
  55. end
  56.